10 A=A+1
12 IFA=1THENLOAD"CHAR",8,1